﻿Namespace Assets

    Public Class DataItemValueChanged

        Private m_dataitem As IDataItem

        ReadOnly Property DataItem() As IDataItem
            Get
                Return m_dataitem
            End Get
        End Property

        Public Sub New(value As IDataItem)
            m_dataitem = value
        End Sub
    End Class

End Namespace